home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / compuserve-file-archive / 05 Programming / RS232.ARC / TERM%a4MISC.C < prev   
Text File  |  2019-04-13  |  369b  |  40 lines
  1. /*
  2.     TERMñMISC.C
  3.  
  4.  
  5. */
  6.  
  7. #INCLUDE <STDIO.H>
  8.  
  9. #INCLUDE <DEFN.H>
  10.  
  11. EXTERN CHAR INKEY();
  12.  
  13. /*
  14.   PAUSE() A DUMMY CALL FOR DELAYS
  15. */
  16.  
  17.  
  18. PAUSE(LEN)
  19. UNSIGNED LEN;
  20. █ 
  21.     UNSIGNED COUNT; 
  22.     FOR(COUNT=0;COUNT<LEN;COUNT++); 
  23. ▌
  24.  
  25.  
  26.  
  27. /*
  28.   ╟ET╦EY();  WAIT FOR ╧╬┼! KEY TO BE TYPED  
  29. */
  30.  
  31. CHAR ╟ET╦EY()
  32. █ 
  33.     CHAR CH=0;
  34.     WHILE((CH = INKEY()) ╔╙ñ┼╤╒┴╠ 0)
  35.         ;
  36.     RETURN CH;
  37. ▌
  38.  
  39.  
  40.